* lisp/international/mule-diag.el (mule-diag): Insert a newline after

each fontset description.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e3b03938259844553400c2682208a490deb955a1..41aacc7447f89c8ff6e558e5588aab4c46fef371 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-09-23  Andreas Schwab  <schwab@linux-m68k.org>
+
+       * international/mule-diag.el (mule-diag): Insert a newline after
+       each fontset description.
+
 2011-09-23  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * simple.el (delete-trailing-whitespace):

diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index d9ac587231e92b9ea78c40fcde3d7784b46132a1..cccf65b80511ca085b3d553515c66a4c1c88c33f 100644 (file)
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -1139,7 +1139,8 @@ system which uses fontsets)."
        (insert "Fontset-Name\t\t\t\t\t\t  WDxHT Style\n")
        (insert "------------\t\t\t\t\t\t  ----- -----\n")
        (dolist (fontset (fontset-list))
-         (print-fontset fontset t)))
+         (print-fontset fontset t)
+         (insert "\n")))
       (help-print-return-message))))
 
 ;;;###autoload